home *** CD-ROM | disk | FTP | other *** search
/ Holt Researcher: American History / Holt Researcher: American History.iso / pc / modules / tour.dxr / 00013_main menu second frame.ls < prev    next >
Encoding:
Text File  |  2000-01-21  |  644 b   |  28 lines
  1. on exitFrame
  2.   global gMenuList, gMenuButton, gMenuExit, menuAudio, gPlaySound, audioPath
  3.   repeat with X = 30 to 35
  4.     menuObj = getaProp(gMenuList, X)
  5.     Inscope(menuObj)
  6.   end repeat
  7.   Inscope(gMenuButton)
  8.   Inscope(gMenuExit)
  9.   if gPlaySound then
  10.     if menuAudio = "none" then
  11.       gPlaySound = 0
  12.     else
  13.       sound playFile 1, audioPath & menuAudio & ".AIF"
  14.       gPlaySound = 0
  15.     end if
  16.   end if
  17.   if (menuAudio = "1000") and not soundBusy(1) then
  18.     menuAudio = "none"
  19.     go("Welcome")
  20.   end if
  21.   repeat with rc in gMenuList
  22.     doRollover(rc)
  23.   end repeat
  24.   doRollover(gMenuButton)
  25.   doRollover(gMenuExit)
  26.   go(the frame)
  27. end
  28.